var a : array [Integer, ] of Integer;